home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Plus Special 24
/
AMIGAplus Sonderheft 24 (2000)(Falke)(DE)[!].iso
/
Rexx
/
Version.ecall
< prev
next >
Wrap
Text File
|
1999-11-06
|
815b
|
27 lines
/*****************************************************************
** **
** Version.ecall EuraCall-Script **
** Liefert die Version von EuraCall **
** **
******************************************************************
**
** V1.0 -- (C) 1997 Richard Körber -- All Rights Reserved
**
**/
OPTIONS RESULTS
OPTIONS FAILAT 6
IF Left(Address(),8)~='EURACALL' THEN ADDRESS 'EURACALL.1'
/*---- SCRIPT STARTS HERE --------------------------------------*/
'VERSION'
PARSE VAR result ver '.' rev '(' date ')'
SAY "Version" ver "Revision" rev "vom" date ||"."
/*---- SCRIPT ENDS HERE ----------------------------------------*/
EXIT